home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 August / chip-cd_2003_08.zip / 08 / Przeglad programow P2P / Shareaza 1.9 / Shareaza1890.exe / Plugins / RazaWebHook.dll / 3081 / HTML / 3000
Text File  |  2002-12-16  |  458b  |  25 lines
  1. <script language="VBScript" runAt="client">
  2.  
  3. Set oEvent = External.MenuArguments.Event
  4.  
  5. Set oLink = oEvent.SrcElement
  6.  
  7. If oLink = "[object]" Then
  8.     Set oLink = oEvent.SrcElement.ParentElement
  9.     
  10.     If oLink = "[object]" Then
  11.         
  12.         oLink = oEvent.SrcElement.Src
  13.         
  14.     End If
  15. End If
  16.  
  17. If IsNull(oLink) Then
  18.     oLink = Window.External.MenuArguments.Location
  19. End If
  20.  
  21. External.MenuArguments.Location.Href = oLink & ".ForShareaza"
  22.  
  23. </script>
  24. </html>
  25.